(rmail-start-mail): Set mail-dedicated-frame frame param.

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index a63e9de63232733df568fb7b4af3662cd85b4c28..31be2304bb044e560df7258e1704a3a7238a19d1 100644 (file)
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -2053,8 +2053,10 @@ Deleted messages stay in the file until the \\[rmail-expunge] command is given."
   (if (and window-system rmail-mail-new-frame)
       (prog1
        (apply 'mail-other-frame args)
+       ;; This is not a standard frame parameter;
+       ;; nothing except sendmail.el looks at it.
        (modify-frame-parameters (selected-frame)
-                                '((dedicated . t))))
+                                '((mail-dedicated-frame . t))))
     (apply 'mail-other-window args)))
 
 (defun rmail-mail ()